String s = "";
s += "%!PS-Adobe-2.0 \r\n";
s += "/orient 0 def /xpos 0 def /ypos 0 def \r\n";
s += "0 0 0 setrgbcolor\r\n"; // Stiftfarbe
s += "/goto { /ypos exch def /xpos exch def xpos ypos moveto} def\r\n";
s += "/turn { /orient exch orient add def} def \r\n";
s += "/draw { /len exch def newpath xpos ypos moveto \r\n";
s += "   /xpos xpos orient sin len mul add def \r\n";
s += "   /ypos ypos orient cos len mul add def \r\n";
s += "   xpos ypos lineto stroke \r\n";
s += "} def \r\n";
s += "300 400 goto\r\n"; // in Blattmitte beginnen

s += $1+"\r\n"; // Die synthetisierten Inhalte in $1 anfgen   

Output.WriteLine(s);